CD BIT 75/CD BIT 75.iso/Software/LogOut/disk1/_SETUP.1/GCondom7.exe/0/RCDATA/TFRMMULTAS/TFRMMULTAS.txt

Text File | 2004-10-21 | 13KB | 447 lines

object frmMultas: TfrmMultas
  Left = 196
  Top = 114
  BorderStyle = bsNone
  Caption = 'frmMultas'
  ClientHeight = 491
  ClientWidth = 688
  Color = clWhite
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Image1: TImage
    Left = 0
    Top = 0
    Width = 688
    Height = 491
    Align = alClient
    Picture.Data = {<image000.bmp>}
    Stretch = True
  end
  object Label61: TLabel
    Left = 22
    Top = 85
    Width = 70
    Height = 13
    Caption = 'Ordenados por'
    Transparent = True
  end
  object Label10: TLabel
    Left = 248
    Top = 85
    Width = 19
    Height = 13
    Caption = 'Ano'
    Transparent = True
  end
  object RxLabel2: TRxLabel
    Left = 413
    Top = 85
    Width = 10
    Height = 17
    Alignment = taRightJustify
    Caption = '0'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object SpeedButton3: TSpeedButton
    Left = 433
    Top = 83
    Width = 100
    Height = 20
    Caption = 'Seleccionar Todos'
    Flat = True
    OnClick = SpeedButton3Click
  end
  object Label1: TLabel
    Left = 444
    Top = 400
    Width = 98
    Height = 13
    Caption = 'Dar uma margem de '
    Transparent = True
  end
  object Label8: TLabel
    Left = 10
    Top = 36
    Width = 660
    Height = 41
    Alignment = taCenter
    AutoSize = False
    Caption =
      'Devem seleccionar-se os condom�nios em que se pretende fazer a a' +
      'n�lise das penaliza��es. O resultado dessa an�lise pode dar a or' +
      'igem ao lan�amento de um Aviso de D�bito ou apenas d�bito nas co' +
      'ntas correntes dos cond�minos em d�vida. � ainda poss�vel defini' +
      'r uma margem em dias a partir da data de vencimento do documento' +
      '. Os crit�rios a aplicar s�o os definidos para cada condom�nio.'
    Transparent = True
    WordWrap = True
  end
  object Label2: TLabel
    Left = 8
    Top = 4
    Width = 430
    Height = 29
    Caption = 'Verifica��o de penaliza��es (multas)'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -24
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label3: TLabel
    Left = 580
    Top = 400
    Width = 22
    Height = 13
    Caption = 'dias.'
    Transparent = True
  end
  object ComboBox4: TComboBox
    Left = 102
    Top = 83
    Width = 110
    Height = 21
    Hint = 'Muda a ordena��o da lista'
    Style = csDropDownList
    Color = clInfoBk
    ItemHeight = 13
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    OnChange = ComboBox4Change
    Items.Strings = (
      'C�digo'
      'Condom�nio'
      'Contribuinte'
      'Ano')
  end
  object Edit2: TEdit
    Left = 278
    Top = 83
    Width = 50
    Height = 21
    Hint = 'Texto a procurar, dependendo da ordena��o'
    TabStop = False
    Color = clInfoBk
    Ctl3D = True
    ParentCtl3D = False
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 1
    Text = '2002'
    OnChange = Edit2Change
  end
  object UpDown1: TUpDown
    Left = 328
    Top = 83
    Width = 16
    Height = 21
    Associate = Edit2
    Min = 1995
    Max = 2010
    Position = 2002
    TabOrder = 2
    Thousands = False
    Wrap = False
  end
  object CheckBox1: TCheckBox
    Left = 349
    Top = 85
    Width = 49
    Height = 17
    Caption = 'Todos'
    TabOrder = 3
    OnClick = CheckBox1Click
  end
  object RxDBGrid1: TRxDBGrid
    Left = 20
    Top = 112
    Width = 645
    Height = 265
    Ctl3D = False
    DataSource = DataSource1
    FixedColor = 14143935
    Options = [dgTitles, dgColLines, dgRowLines, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
    ParentCtl3D = False
    TabOrder = 4
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    MultiSelect = True
    Columns = <
      item
        Expanded = False
        FieldName = 'ID'
        Title.Alignment = taCenter
        Title.Caption = 'C�d.'
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Condom�nio'
        Title.Alignment = taCenter
        Width = 410
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Contr.'
        Title.Alignment = taCenter
        Width = 89
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Ano'
        Title.Alignment = taCenter
        Width = 60
        Visible = True
      end>
  end
  object RadioGroup2: TRadioGroup
    Left = 220
    Top = 385
    Width = 185
    Height = 88
    ItemIndex = 0
    Items.Strings = (
      'Verificar Avisos de D�bito'
      'Verificar Recibos n�o pagos'
      'Verificar Avisos e Recibos')
    TabOrder = 5
  end
  object RadioGroup1: TRadioGroup
    Left = 20
    Top = 385
    Width = 185
    Height = 88
    ItemIndex = 0
    Items.Strings = (
      'Criar Avisos de D�bito'
      'S� lan�ar em Contas Correntes'
      'Simular apenas')
    TabOrder = 6
  end
  object CurrencyEdit1: TCurrencyEdit
    Left = 546
    Top = 397
    Width = 30
    Height = 19
    AutoSize = False
    Ctl3D = False
    DecimalPlaces = 0
    DisplayFormat = ',0;-,0'
    ParentCtl3D = False
    TabOrder = 7
  end
  object BitBtn1: TBitBtn
    Left = 442
    Top = 439
    Width = 90
    Height = 25
    Caption = 'Analisar'
    TabOrder = 8
    OnClick = BitBtn1Click
    Glyph.Data = {
      1A070000424D1A0700000000000036000000280000001C000000150000000100
      180000000000E406000012170000121700000000000000000000FFFFFFEFE7E7
      B57373C69C9CF7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFB57B7B9431318C29319C5A63EFE7E7
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFB56B6B8C29318C31319431398C3131D6BDBDFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7EFEFA56B738C
      29319431318C31318C3131AD7B7BEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F7F7CEA5A58C31318C31319429318C
      3131944A4ADECECEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFEFDEDEA54A528C31318C31319431398C3131B58C8CF7
      F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFF7F7F7B57B7B8C29319431318C3131943131945252EFEFEFFFFFFFFFFFFFFF
      FFFFD6CECEA5A59CADA5A5BDB5B5DEDEDEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDEB5BD9439
      398C31318C29318C3131BDADADFFFFFFF7F7F7ADADA58C9484949C8C84847B7B
      736B7B736BA59C94E7E7E7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7E79C5A5A8C21298418218C5A
      5AE7E7E7A5C6B5ADEFC6CEEFC6E7EFC6EFEFC6D6D6B5949C8C847B73948C7BDE
      D6D6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFF7F7F7CEA5A5D6ADB59C84847B7B7394E7C6BDEFC6CEEF
      C6E7EFC6F7EFC6FFEFC6F7EFC6ADAD9C847B73948C84E7E7DEFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFF7BA5949CEFC6C6EFC6CEEFC6E7EFC6F7EFC6FFEFC6FFEF
      C6E7EFCEADA5A5847B73A59C94F7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F7F77BA594
      9CEFC6BDEFC6CEEFC6E7EFC6EFEFC6F7EFC6FFEFC6F7EFC6F7EFDEA59C94847B
      73DED6D6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7BA59494EFC6B5EFC6CEEFC6D6EFC6
      E7EFC6F7EFC6FFEFC6FFEFC6FFEFC6DEE7BD84847BA59C94FFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFA5A59C8CEFC6ADEFC6C6EFC6CEEFC6DEEFC6EFEFC6F7EFC6FFEFC6
      FFEFC6F7EFC69C9C8C847B73F7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDED6D67BCEAD9C
      EFC6B5EFC6C6EFC6D6EFC6E7EFC6EFEFC6F7EFC6FFEFC6FFEFC6B5BDA57B736B
      EFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA5ADA58CE7BDA5EFC6BDEFC6CEEFC6D6
      EFC6DEEFC6EFEFC6F7EFC6F7EFC6BDCEAD7B7373FFF7F7FFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFEFEFEF8CAD9C8CE7C6ADEFC6BDEFC6C6EFC6D6EFC6DEEFC6E7EFC6E7
      EFC6A5B5A5A5A59CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7DE8CAD
      9C8CE7C6A5EFC6B5EFC6BDEFC6C6EFC6CEEFC6BDEFC6A5B5A5EFEFEFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFA5ADA57BBDA58CE7BD9CEF
      C6A5EFC69CDEBDA5C6B5EFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFDED6D6ADADA5949C94949C94BDBDB5EFEFEFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
  end
  object BitBtn2: TBitBtn
    Left = 552
    Top = 439
    Width = 90
    Height = 25
    Caption = 'Sair'
    TabOrder = 9
    OnClick = BitBtn2Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
      03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
      0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
      0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
      0333337F777FFFFF7F3333000000000003333377777777777333}
    NumGlyphs = 2
  end
  object ListBox1: TListBox
    Left = 480
    Top = 136
    Width = 121
    Height = 225
    ItemHeight = 13
    TabOrder = 10
    Visible = False
  end
  object Table1: TTable
    Left = 456
    Top = 8
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 488
    Top = 8
  end
  object tRecibos: TTable
    DatabaseName = 'Database1'
    Filtered = True
    IndexName = 'iNumero'
    TableName = 'Recibos.db'
    Left = 528
    Top = 8
  end
  object MemoryTable1: TMemoryTable
    Left = 568
    Top = 8
    object MemoryTable1Nome: TStringField
      FieldName = 'Nome'
      Size = 50
    end
    object MemoryTable1Fraccao: TStringField
      FieldName = 'Fraccao'
      Size = 15
    end
    object MemoryTable1Tipo: TStringField
      FieldName = 'Tipo'
    end
    object MemoryTable1Numero: TIntegerField
      FieldName = 'Numero'
    end
    object MemoryTable1Data: TDateField
      FieldName = 'Data'
    end
    object MemoryTable1PorLiquidar: TFloatField
      FieldName = 'PorLiquidar'
    end
    object MemoryTable1Multa: TFloatField
      FieldName = 'Multa'
    end
  end
  object frReport1: TfrReport
    InitialZoom = pzDefault
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
    OnBeforePrint = frReport1BeforePrint
    Left = 656
    Top = 72
    ReportForm = {18000000}
  end
  object frTextExport1: TfrTextExport
    ScaleX = 1
    ScaleY = 1
    Left = 656
    Top = 112
  end
  object frRTFExport1: TfrRTFExport
    ScaleX = 1.300000000000000000
    ScaleY = 1
    Left = 656
    Top = 144
  end
  object frCSVExport1: TfrCSVExport
    ScaleX = 1
    ScaleY = 1
    Delimiter = ';'
    Left = 656
    Top = 176
  end
  object frHTMExport1: TfrHTMExport
    ScaleX = 1
    ScaleY = 1
    Left = 656
    Top = 208
  end
  object frBDEComponents1: TfrBDEComponents
    Left = 656
    Top = 240
  end
  object frDBDataSet1: TfrDBDataSet
    DataSet = MemoryTable1
    Left = 656
    Top = 272
  end
end